home *** CD-ROM | disk | FTP | other *** search
/ Chip 2004 April / CMCD0404.ISO / Software / Shareware / Multimedia / extrememov / extrememm2.6b3sharefull.exe / {app} / scripts / [DVDZONE2.COM] - (Full Import- 2° Generation) @Mehdi Bourmad 23_10_2002.txt < prev    next >
Encoding:
Text File  |  2004-02-03  |  11.8 KB  |  422 lines
  1. -----------------------------------------------
  2. -            eXtreme Movie Manager            -
  3. -            MagicScript Technology           -
  4. -          2002 Alessio "AleTsg" Viti         -
  5. -----------------------------------------------
  6. - Web :      DVDZONE2.COM                     -
  7. - Author :   Mehdi BOURMAD                    -
  8. - Date  :    23/10/2002                       -
  9. - Comments : Import All Information           -
  10. -----------------------------------------------
  11.  
  12. #MADEBY#=Mehdi BOURMAD
  13. #DATEBUILD#=23/10/2002
  14. #WEBSITE#=DVDZONE2.COM (ENGLISH)
  15. #NOTE#=First release
  16. #SCRIPTQUALITY#=3
  17. #SCRIPTGENERATION#=2
  18.  
  19. #WEBQUERY#=http://www.dvdzone2.com/cgi-bin/en/OM.cgi?command=listitems&type=search&search=#MOVIE#
  20.  
  21.  
  22. #RIGHTPAGEFOUND#
  23.     #STARTREADWEB#
  24.     #FINDLINE#=<title>#12##ONERROR#=*STOP*
  25.     #FIND#=>#01##ONERROR#=*STOP*
  26.     #PUT#=10#02#
  27.     #TAKEWORDLEN#=#03#,#01#,#02#
  28.     #PUT#=DVD Zone 2#04# 
  29.     #CONDITIONRIGHTPAGE# #03#<>#04#
  30. #ENDRIGHTPAGEFOUND#
  31.  
  32. #CREATEMOVIELIST#
  33.     #STARTREADWEB#
  34.     #WRITETITLELIST#=                          
  35.     #WRITETITLELIST#=Titles
  36.     #WRITETITLELIST#=----------------------
  37.     #FINDLINE#=Here is the result of your search request for#12##ONERROR#=*OK*
  38.     #PUT#=0#13#
  39.     #IF# #13#==#12#
  40.         #GOTO#=ENDMOVIES-END
  41.     #ENDIF#
  42.     :REPEATMOVIELIST-1 
  43.         #FIND#=<!--debut coldroite-->#25# #ONERROR#=*OK*         //the end of the list
  44.         #PUTCURSOR#=#21#
  45.         #SETCURSOR#=1
  46.         #FIND#=Here is the result of your search request for#12##ONERROR#=*OK*
  47.         :REPEATMOVIELIST-2
  48.           // Get item value
  49.           #FIND#=itemid#01# #ONERROR#=*OK*
  50.                 #IF# #01#==#13#
  51.             // if the list is finish, going out
  52.             #GOTO#=ENDMOVIES
  53.         #ENDIF#
  54.         #IF# #01#>>#25#
  55.             // if the list is over the </OL> it means that is finish
  56.             #GOTO#=ENDMOVIES
  57.         #ENDIF#
  58.         #FIND#=value#01# #ONERROR#=*OK*
  59.         #FIND#="#01# #ONERROR#=*OK*
  60.         #COMPUTECURSOR#=+1
  61.         #FIND#="#02# #ONERROR#=*OK*
  62.         #TAKEWORD#=#06#,#01#,#02#
  63.           // Get item name
  64.           #FIND#=itemname#01# #ONERROR#=*OK*
  65.                 #IF# #01#==#13#
  66.             // if the list is finish, going out
  67.             #GOTO#=ENDMOVIES
  68.         #ENDIF#
  69.         #IF# #01#>>#25#
  70.             // if the list is over the </OL> it means that is finish
  71.             #GOTO#=ENDMOVIES
  72.         #ENDIF#
  73.         #FIND#=value#04# #ONERROR#=*OK*
  74.         #FIND#="#04# #ONERROR#=*OK*
  75.         #COMPUTECURSOR#=+1
  76.         #FIND#="#05# #ONERROR#=*OK*
  77.         #TAKEWORD#=#07#,#04#,#05#
  78.         #CHECKVARIABLE#=#07#
  79.         #STARTDELETETAGS#
  80.         #STARTSUBSTITUTETAGS#
  81.         #WRITETITLELIST#=http://www.dvdzone2.com/cgi-bin/en/OM.cgi?command=showitems&type=search&search=#06#    ---> #07#
  82.         #//WRITETITLELIST#=#07# - http://www.dvdzone2.com/cgi-bin/en/OM.cgi?command=showitems&type=search&search=#06#
  83.         #//WRITETITLELIST#=http://localhost:160/~dvdzone2/search2.html    ---> #07#
  84.         #GOTO#=REPEATMOVIELIST-2
  85.         :ENDMOVIES
  86.      :ENDMOVIES-END
  87.     //-----------------------------------------------------------------------
  88. #ENDCREATEMOVIELIST#
  89.  
  90. #MOVIETITLE#
  91.     #STARTREADWEB#
  92.     #FINDLINE#=size="5"#12##ONERROR#=*STOP*
  93.     #FIND#=>#01# #ONERROR#=*STOP*
  94.     #FIND#=<#02# #ONERROR#=*STOP*
  95.     #TAKEWORD#=#03#,#01#,#02#
  96.     #CHECKVARIABLE#=#03#
  97.     #STARTDELETETAGS#
  98.     #STARTSUBSTITUTETAGS#
  99.     #TITLE#=#03# #ONERROR#=*ASK*
  100. #ENDMOVIETITLE#
  101.  
  102. #DIRECTOR#
  103.     #STARTREADWEB#
  104.     #PUT#=0#11#
  105.     #FINDLINE#=Director#10##ONERROR#=*STOP*
  106.     #FIND#=: #01##ONERROR#=*STOP*
  107.     #FIND#=<br>#02##ONERROR#=*STOP*
  108.     #TAKEWORD#=#03#,#01#,#02#
  109.     #CHECKVARIABLE#=#03#
  110.     #STARTDELETETAGS#
  111.     #STARTSUBSTITUTETAGS#
  112.     #TAKEDIRECTOR#=#03# #ONERROR#=*ASK*
  113. #ENDDIRECTOR#
  114.  
  115. #ACTORS#
  116.     #STARTREADWEB#
  117.     #PUT#=0#11#
  118.     #FINDLINE#=Actors :#10##ONERROR#=*STOP*
  119.     #FIND#=<br>#22##ONERROR#=*STOP*
  120.     #STARTREADWEB#
  121.     #FINDLINE#=Actors :#10##ONERROR#=*STOP*
  122.          :REPEATACTORS1
  123.          #FIND#=">#01##ONERROR#=*STOP*
  124.          #IF# #01#==#11#
  125.              #GOTO#=ENDACTORS1
  126.          #ENDIF#
  127.          #PUTCURSOR#=#23#
  128.          #IF# #01#<<#22#
  129.              #FIND#=>#01##ONERROR#=*STOP*
  130.              #FIND#=<#02##ONERROR#=*STOP*
  131.              #TAKEWORD#=#03#,#01#,#02#
  132.              #CHECKVARIABLE#=#03#
  133.              #STARTDELETETAGS#
  134.              #STARTSUBSTITUTETAGS#
  135.              #TAKEACTOR#=#03#
  136.              #GOTO#=REPEATACTORS1
  137.          #ENDIF#
  138.     :ENDACTORS1
  139. #ENDACTORS#
  140.  
  141. #STUDIO#
  142.     #STARTREADWEB#
  143.     #FINDLINE#=Studio :#10##ONERROR#=*STOP*
  144.     #PUT#=0#39#
  145.     #FIND#=: #01##ONERROR#=*STOP*
  146.     #FIND#=<br>#02##ONERROR#=*STOP*
  147.     #TAKEWORD#=#03#,#01#,#02#
  148.     #CHECKVARIABLE#=#03#
  149.     #STARTDELETETAGS#
  150.     #STARTSUBSTITUTETAGS#
  151.     #TAKESTUDIO#=#03#
  152. #ENDSTUDIO#
  153.  
  154. #YEAR#
  155.     #STARTREADWEB#
  156.     #FINDLINE#=Production Year :#12##ONERROR#=*STOP*
  157.     #PUT#=0#39#
  158.     #FIND#=: #01##ONERROR#=*STOP*
  159.     #FIND#=<#02##ONERROR#=*STOP*
  160.     #TAKEWORD#=#03#,#01#,#02#
  161.     #CHECKVARIABLE#=#03#
  162.     #STARTDELETETAGS#
  163.     #STARTSUBSTITUTETAGS#
  164.     #TAKEYEAR#=#03#
  165. #ENDYEAR#
  166.  
  167. #PLOT#
  168.     #STARTREADWEB#
  169.     #FINDLINE#=Summary#12##ONERROR#=*STOP*
  170.     #FIND#=">#01# #ONERROR#=*STOP*
  171.     #FIND#=>#01# #ONERROR#=*STOP*
  172.     #FIND#=</font>#02# #ONERROR#=*STOP*
  173.     #TAKEWORD#=#03#,#01#,#02#
  174.     #CHECKVARIABLE#=#03#
  175.     #STARTDELETETAGS#
  176.     #STARTSUBSTITUTETAGS#
  177.     #TAKEPLOT#=#03#
  178. #ENDPLOT#
  179.  
  180. #REGION#
  181.     #STARTREADWEB#
  182.     #PUT#=Region 2#08# 
  183.     #TAKEREGION#=#08#
  184. #ENDREGION#
  185.  
  186. #SCREENDVD#
  187.     #STARTREADWEB#
  188.     #FINDLINE#=Video :#10##ONERROR#=*STOP*
  189.     #//FIND#= <br>#01##ONERROR#=*STOP*
  190.     #//COMPUTECURSOR#=+5
  191.     #//PUTCURSOR#=#01#
  192.     #FIND#=(#01##ONERROR#=*STOP*
  193.     #FIND#=)#02##ONERROR#=*STOP*
  194.     #TAKEWORD#=#03#,#01#,#02#
  195.     #COMPUTECURSOR#=+1
  196.     #PUTCURSOR#=#01#
  197.     #FIND#=<br>#02##ONERROR#=*STOP*
  198.     #TAKEWORD#=#04#,#01#,#02#
  199.     #STARTDELETETAGS#
  200.     #STARTSUBSTITUTETAGS#
  201.     #STRING#=#03#=#03# (#04#)
  202.     #TAKESCREENDVD#=#03#
  203. #ENDSCREENDVD#
  204.  
  205. #AUDIODVD#
  206.     #STARTREADWEB#
  207.     #PUT#=0#11#
  208.     #FINDLINE#=Audio :#10##ONERROR#=*STOP*
  209.     #FIND#=<b>#22##ONERROR#=*STOP*
  210.     #STARTREADWEB#
  211.     #FINDLINE#=Audio :#10##ONERROR#=*STOP*
  212.     #FIND#= <br>#01##ONERROR#=*STOP*
  213.     #COMPUTECURSOR#=+5
  214.     #PUTCURSOR#=#01#
  215.          :REPEATAUDIODVD1
  216.          #IF# #01#==#11#
  217.              #GOTO#=ENDAUDIODVD1
  218.          #ENDIF#
  219.          #PUTCURSOR#=#23#
  220.          #IF# #01#<<#22#
  221.              #FIND#=:#02##ONERROR#=*STOP*
  222.              #IF# #02#==#11#
  223.                  #GOTO#=ENDAUDIODVD1
  224.              #ENDIF#
  225.              #FIND#=<br>#02##ONERROR#=*STOP*
  226.              #IF# #02#<<#22#
  227.                  #TAKEWORD#=#03#,#01#,#02#
  228.                  #FIND#=>#01##ONERROR#=*STOP*
  229.                  #CHECKVARIABLE#=#03#
  230.                  #STARTDELETETAGS#
  231.                  #STARTSUBSTITUTETAGS#
  232.                  #TAKEAUDIODVD#=#03#
  233.                  #GOTO#=REPEATAUDIODVD1
  234.              #ENDIF#
  235.          #ENDIF#
  236.     :ENDAUDIODVD1
  237. #ENDAUDIODVD#
  238.  
  239. #COMMENTS#
  240.     #STARTREADWEB#
  241.     #PUT#=0#09#
  242.     #PUT#=1#08#
  243.     #FINDLINE#=features :</b><br>#12##ONERROR#=*STOP*
  244.     // Skip 2 <br> tags with new lines
  245.     #FIND#=<br>#01# #ONERROR#=*OK*
  246.     #COMPUTECURSOR#=+5
  247.     #FIND#=<br>#01# #ONERROR#=*OK*
  248.     #FIND#=>#01# #ONERROR#=*OK*
  249.     #COMPUTECURSOR#=+5
  250.     #PUTCURSOR#=#01#
  251.     #FIND#=</font><br>#02# #ONERROR#=*STOP*
  252.     #TAKEWORD#=#03#,#01#,#02#
  253.     #CHECKVARIABLE#=#03#
  254.     #STARTDELETETAGS#
  255.     #STARTSUBSTITUTETAGS#
  256.     #CLEARTAGS#
  257.     #TAKECOMMENTS#=#03#
  258. #ENDCOMMENTS#
  259.  
  260. #RUNTIME#
  261.     #STARTREADWEB#
  262.     #FINDLINE#=Runtime :#12##ONERROR#=*STOP*
  263.     #FIND#=</b>#01# #ONERROR#=*STOP*
  264.     #FIND#=>#01# #ONERROR#=*STOP*
  265.     #FIND#=</font><br>#02# #ONERROR#=*STOP*
  266.     #TAKEWORD#=#03#,#01#,#02#
  267.     #CHECKVARIABLE#=#03#
  268.     #STARTDELETETAGS#
  269.     #STARTSUBSTITUTETAGS#
  270.     #TAKERUNTIME#=#03#
  271. #ENDRUNTIME#
  272.  
  273. #MOVIEID#
  274.     #STARTREADWEB#
  275.     #FINDLINE#=itemid#12##ONERROR#=*STOP*
  276.     #FIND#=value="#01# #ONERROR#=*STOP*
  277.     #FIND#="#01# #ONERROR#=*STOP*
  278.     #FIND#=">#02# #ONERROR#=*STOP*
  279.     #TAKEWORD#=#03#,#01#,#02#
  280.     #TAKEMOVIEID#=#03#
  281. #ENDMOVIEID#
  282.  
  283. #POSTER#
  284.     #STARTREADWEB#
  285.     #FINDLINE#=itemid#12##ONERROR#=*STOP*
  286.     #FIND#=value="#01# #ONERROR#=*STOP*
  287.     #FIND#="#01# #ONERROR#=*STOP*
  288.     #FIND#=">#02# #ONERROR#=*STOP*
  289.     #TAKEWORD#=#03#,#01#,#02#
  290.     #STRING#=#04#=http://www.dvdzone2.com/htdocs/movies/#03#.jpg
  291.     #TAKEPOSTER#=#04#
  292. #ENDPOSTER#
  293.  
  294. #DELETETAGS#
  295.     #DELETEWORD#=         
  296.     #DELETEWORD#=        
  297.     #DELETEWORD#=       
  298.     #DELETEWORD#=      
  299.     #DELETEWORD#=     
  300.     #DELETEWORD#=    
  301.     #DELETEWORD#=   
  302.     #DELETEWORD#=  
  303.     #DELETEWORD#=
  304.  
  305.     #DELETEWORD#=    
  306.     #DELETEWORD#=</b>
  307.     #DELETEWORD#= 
  308.     #DELETEWORD#=</a>
  309.     #DELETEWORD#=<br>
  310.     #DELETEWORD#=</br>
  311.     #DELETEWORD#=<BR>
  312.     #DELETEWORD#=</BR>
  313.     #DELETEWORD#=</P>
  314.     #DELETEWORD#=</p>
  315.     #DELETEWORD#=</b>
  316.     #DELETEWORD#=<b>
  317.     #DELETEWORD#=</B>
  318.     #DELETEWORD#=<B>
  319.     #DELETEWORD#=</BLOCKQUOTE>
  320.     #DELETEWORD#=</blockquote>
  321. #ENDDELETETAGS#
  322.  
  323. #SUBSTITUTETAGS#
  324.     #SUBSTITUTEWORD#= = 
  325.     #SUBSTITUTEWORD#=¡=í
  326.     #SUBSTITUTEWORD#=¢=ó
  327.     #SUBSTITUTEWORD#=£=ú
  328.     #SUBSTITUTEWORD#=¤=ñ
  329.     #SUBSTITUTEWORD#=¥=Ñ
  330.     #SUBSTITUTEWORD#=¦=ª
  331.     #SUBSTITUTEWORD#=§=º
  332.     #SUBSTITUTEWORD#=¨=¿
  333.     #SUBSTITUTEWORD#=©=⌐
  334.     #SUBSTITUTEWORD#=ª=¬
  335.     #SUBSTITUTEWORD#=«=½
  336.     #SUBSTITUTEWORD#=¬=¼
  337.     #SUBSTITUTEWORD#=­=¡
  338.     #SUBSTITUTEWORD#=®=«
  339.     #SUBSTITUTEWORD#=¯=»
  340.     #SUBSTITUTEWORD#=°=░
  341.     #SUBSTITUTEWORD#=±=▒
  342.     #SUBSTITUTEWORD#=²=▓
  343.     #SUBSTITUTEWORD#=³=│
  344.     #SUBSTITUTEWORD#=´=┤
  345.     #SUBSTITUTEWORD#=µ=╡
  346.     #SUBSTITUTEWORD#=¶=╢
  347.     #SUBSTITUTEWORD#=·=╖
  348.     #SUBSTITUTEWORD#=¸=╕
  349.     #SUBSTITUTEWORD#=¹=╣
  350.     #SUBSTITUTEWORD#=º=║
  351.     #SUBSTITUTEWORD#=»=╗
  352.     #SUBSTITUTEWORD#=¼=╝
  353.     #SUBSTITUTEWORD#=½=╜
  354.     #SUBSTITUTEWORD#=¾=╛
  355.     #SUBSTITUTEWORD#=¿=┐
  356.     #SUBSTITUTEWORD#=À=└
  357.     #SUBSTITUTEWORD#=Á=┴
  358.     #SUBSTITUTEWORD#=Â=┬
  359.     #SUBSTITUTEWORD#=Ã=├
  360.     #SUBSTITUTEWORD#=Ä=─
  361.     #SUBSTITUTEWORD#=Å=┼
  362.     #SUBSTITUTEWORD#=Æ=╞
  363.     #SUBSTITUTEWORD#=Ç=╟
  364.     #SUBSTITUTEWORD#=È=╚
  365.     #SUBSTITUTEWORD#=É=╔
  366.     #SUBSTITUTEWORD#=Ê=╩
  367.     #SUBSTITUTEWORD#=Ë=╦
  368.     #SUBSTITUTEWORD#=Ì=╠
  369.     #SUBSTITUTEWORD#=Í=═
  370.     #SUBSTITUTEWORD#=Î=╬
  371.     #SUBSTITUTEWORD#=Ï=╧
  372.     #SUBSTITUTEWORD#=Ð=╨
  373.     #SUBSTITUTEWORD#=Ñ=╤
  374.     #SUBSTITUTEWORD#=Ò=╥
  375.     #SUBSTITUTEWORD#=Ó=╙
  376.     #SUBSTITUTEWORD#=Ô=╘
  377.     #SUBSTITUTEWORD#=Õ=╒
  378.     #SUBSTITUTEWORD#=Ö=╓
  379.     #SUBSTITUTEWORD#=×=╫
  380.     #SUBSTITUTEWORD#=Ø=╪
  381.     #SUBSTITUTEWORD#=Ù=┘
  382.     #SUBSTITUTEWORD#=Ú=┌
  383.     #SUBSTITUTEWORD#=Û=█
  384.     #SUBSTITUTEWORD#=Ü=▄
  385.     #SUBSTITUTEWORD#=Ý=▌
  386.     #SUBSTITUTEWORD#=Þ=▐
  387.     #SUBSTITUTEWORD#=ß=▀
  388.     #SUBSTITUTEWORD#=à=α
  389.     #SUBSTITUTEWORD#=á=ß
  390.     #SUBSTITUTEWORD#=â=Γ
  391.     #SUBSTITUTEWORD#=ã=π
  392.     #SUBSTITUTEWORD#=ä=Σ
  393.     #SUBSTITUTEWORD#=å=σ
  394.     #SUBSTITUTEWORD#=æ=µ
  395.     #SUBSTITUTEWORD#=ç=τ
  396.     #SUBSTITUTEWORD#=è=Φ
  397.     #SUBSTITUTEWORD#=é=Θ
  398.     #SUBSTITUTEWORD#=ê=Ω
  399.     #SUBSTITUTEWORD#=ë=δ
  400.     #SUBSTITUTEWORD#=ì=∞
  401.     #SUBSTITUTEWORD#=í=φ
  402.     #SUBSTITUTEWORD#=î=ε
  403.     #SUBSTITUTEWORD#=ï=∩
  404.     #SUBSTITUTEWORD#=ð=≡
  405.     #SUBSTITUTEWORD#=ñ=±
  406.     #SUBSTITUTEWORD#=ò=≥
  407.     #SUBSTITUTEWORD#=ó=≤
  408.     #SUBSTITUTEWORD#=ô=⌠
  409.     #SUBSTITUTEWORD#=õ=⌡
  410.     #SUBSTITUTEWORD#=ö=÷
  411.     #SUBSTITUTEWORD#=÷=≈
  412.     #SUBSTITUTEWORD#=ø=°
  413.     #SUBSTITUTEWORD#=ù=∙
  414.     #SUBSTITUTEWORD#=ú=·
  415.     #SUBSTITUTEWORD#=û=√
  416.     #SUBSTITUTEWORD#=ü=ⁿ
  417.     #SUBSTITUTEWORD#=ý=²
  418.     #SUBSTITUTEWORD#=þ=■
  419.     #SUBSTITUTEWORD#=ÿ= 
  420.     #SUBSTITUTEWORD#="="
  421. #ENDSUBSTITUTETAGS#
  422.